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- QL CORNER 


It seems that I had left out two important voltage readings pertaining to 
the QL Power Supply article last month. Both voltages supply AC voltage 
to a +12VDC and -12VDC Voltage regulators, which are used for the Serial 
ports and Microdrives. 


Looking at the printed circuit board layout (foil side), you will notice 
that three lands are marked 'R', 'G' and ’B’. These pads are where the 
Power cable connects to the power supply and the R G B leters printed on 
these pads represent the color of the three cables nested within the 
power cable. Red is soldered to R and so on. 


Set your Volt meter at least to 20 Volts AC. Plug the power supply АС 
connector into ап АС outlet. Place the Black meter lead on ’Blue" and 
the Red meter lead оп "RED'. You should find a reading of approximately 
17.30 VAC. If you are using a Digital volt meter you can leave the black 
lead of your meter on blue and place the Red meter lead on the"Green" 
Pad. You should get a similar voltage reading as before. If you are using 
an Analog volt meter switch the leads as stated for the digital volt 
meter. 


As I find additional information which would be necessary for trouble 
shooting the QL power supply, it will appear in "The QL Corner. 


A new piece of QL software has surfaced last month from Deltasoft which 
is titled "Flightdeck - 1.03". Flightdeck allows the user to fly a 
twin-engine jet airliner and provides 3-D views of the ’world’ outside. A 
three and a half page review for this program is reviewed in the December 
issue of QL World magazine. Flightdeck-1.03 can be purchased from Dilwyn 
Jones Computing, UK. DJC’s address appears in several past issues of 
LISTing and sports a price of £15.00. Incidentally, it is ту 
understanding that Dilwyn Jones will be attending the QL NEWPORT show 
this coming May. " 


Qubbesoft (UK) is launching a new IDE hard disk interface, named QUBIDE. 
Stuart of Miracle Systems provided the way to connect the interface to 
the QL ROM port at the back of the QL. The price will range fråm 
£75.00 to £100.00. QUBIDE will drive any hard disk up to 120 Megabytes. 
When additional information surfaces, you will be informed in QL Corner. 


While the subject of QL Hard Disk interfaces; a DIY approach has become 
available by German author Dirk Steinkopks. Dirk has developed a small 
hardware circuit with only four TTL gates which connects to the at 
expansion connector and sends the proper signals to an IBM РС/ХТ slot for 
connection to a Hard Disk board. This interface has been tested with 
OMTI and Western Digital Hard Disk controllers and suits both МЕМ and RLL 
drives. 


Software and schematic of Dirk's interface is available from Qubbesoft as 
a Public Domain disk, Special 22. The software is written in both English 
and German. It has been stated that this interface performs happily with 
either a Gold Card от Trump Card. Perhaps the software. will show up at 
the Miracle in Newport II ‘show this May. If so, I will advise our 
readers of its availability. This information stems from the latest issue 
of QL World Magazine. 


See you naxt month...... Bob Gilder 


QL CORNER EXTRA 


February 12th 1994 


I have just received information from Bob Dyl, Editor of IQLR 
(International QL Report), that Miracle Systems LTD, UK has 
introduced a Super Gold Сага at a Computer show in the UK. This 
new interface operates with a 68020 Microprocessor running at 25 
Mhz, comes with Four Megs of RAM on board, has a four drive 
adapter and a "true" Parallel Printer interface built in. 


The price is in the range of £325.00. Miracle will take a trade 
in for an Issue 1, 2, or 3 Gold Card allowing approximately 
£150.00. I am not sure that I have the prices right at this time, 
however, it should come close to the actual cash value. I will 
have all the information for the next issue of LIST. Perhaps, 
they will sell the Super Gold Card with less memory as the Price 
of memory chips in the UK are much higher than in the USA. We 
could add the additional memory upon receipt of the interface. 


Miracle will no doubt sell their new interface at the "Miracle in 
Newport II" show in Rhode Island this spring, May 14th. I intend 
to bring an issue 3 Gold Card at this show for a trade up. 


Bob Gilder 
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9.1. CIRCUIT DIAGRAM PART I 
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0.12. CIRCUIT DIAGRAM PART 11 


Pseudo. ROM шхлт санж 


The dot patterns for the displayable characters are held in a 
table in ROM, in locations 1Е00 to 1FFF hex. The patterns are 
Stored in order of the character CODE, 8 bytes being used for 
each character, corresponding to the 8 TV scan lines used to 
build up each character on the TV screen. The ROM table holds 
the dot patterns for 64 characters, the other 64 are the 
inverse (white on black) versions and are produced by the SCL 


chip inverting the video signal. Addr. Hex. Binar 
TEED 9 202990029 


Looking at, for example, the 
Character 'f', this has the 


CODE 28 (1C hex) and is gener- ЈЕЕТ 3C 20111120 
ated by the 8 ROM bytes start- 1ЕЕ2 46 91220119 
ing at 1ЕЕО hex (1Е00 + 1C x 8). ТЕЕЗ 4A thal 
The hexadecimal and binary ТЕЕ4 52. е1 а 
values of these 8 bytes are TEES 62 9 177 p 
shown alongside and the pattern 1ТЕЕ6 3С 20 820 
сап be seen in the binary version. 1ЕЕ7 90 2272200090 


When the ZX81 is producing the display, it presents 13 bit 
addresses to the ROM to select the wanted 8 bit patterns. The 
low 9 address lines, which specify which character is being 
displayed and which of the 8 horizontal scan lines is currently 
being generated, come from the SC. Chip. The high 4 address 
lines come from the 780 processor and are actually bits 1 to 4 
of the Z80's I register, which is set to 1E hex by NEW. 


Because the starting address of the table is determined by the 
contents of the 28015 I register, we can alter it. As a demon- 
stration, the following program displays 64 characters then 
loads the I register with f$, making the ZX81 use the beginning 
of the ROM as a dot pattern table. Ten seconds later, the dis- 
Play will be returned to normal by restoring the correct value 
to the I register. 


1 REM 12345 

10 POKE 16514,62 ЗА - 
20 POKE 16515,9 The machine code 
30 POKE 16516237 +i d ia: 
40 POKE 16517.71 Бо 
50 POKE 16518.201 
180 FOR А-д TO 63 E- 7 ra 
110 PRINT СНБ5 A; C9 RET 


129 NEXT A 

130 RAND USR 16514 
149 PAUSE 500 

150 POKE 16515,39 
160 RAND USR 16514 


As the beginning of the 2Х81'5 ROM wasn't intended to be used 
as a dot pattern table, it gives a meaningless display ! But, 
if we were to add some RAM to the ZX81, in such a way that the 


— 
-—— 


display generation circuits could use it, then we could РОКЕ 
any dot patterns we wanted into this 'Pseudo КОМ', and so 
create our own character set. This could include shapes for 
games programs, mathematical or engineering symbols, or elemen- 
ts for high resolution drawings. 


The circuit given below shows how 1K of RAM can be added in 
this way. Because all of the wanted signals are not present on 
the ZX81's rear connector, the 'Pseudo ROM' is best fitted 
inside the ZX81's case, with the connections wired directly as 
shown. The extra current taken from the +5V supply will make 
the ZX81's regulator run slightly hotter, but you have drilled 
Cooling holes in the case, haven't you 7] 


It occupies addresses 2000-23FF hex (8192-9215 decimal). This 
is enough for 2 sets of 64 characters, or you could load just 
one set of characters and have 512 bytes left to hold machine 
code or other data. The routine given on the previous page can 
be used to force the ZX81 to use the dot patterns held in the 
Pseudo ROM by changing the value POKEd by line 20 to 32 to 
select the lower ХК of the Pseudo ROM, or 34 to select the 
upper half. Data (including dot patterns) stored in the Pseudo 
ROM won't be SAVEd, but neither is it affected by NEW or LOAD, 
зо you can run one program to fill the Pseudo ROM with approp- 
riate data, then LOAD another program to use it. 
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едом: TIME DESIGNS MoTSart | 
Super Music for the ZX81/TS1000/TS1500 


Zack Xavier Надџег 


The ZX8l-type computers don't have "sound", right? 
WRONG! If you ever listened to a tape of a computer 
program, you'll realize that it is capable of screechy 
noises that could loosely be called "sound". Well, ok, 
but it isn't capable of music, right? WRONG AGAIN! If 
you've envied those other machines that can beep out a 
tune or a laser sound, there's no longer any need to 
feel left out. 

The machine-code program presented here gives you 
three octaves of sound. As listed, the lowest note is 
the "A" just below "Middle. С", but you can move your 
Spectrum up or down аз desired. But that's not all; it 
is easy to write and play music using only BASIC 
commands, thanks to a built-in "music interpreter". No, 
you can't do multiple voices (though you can simulate 
two voices as shown in the demo), and you can't vary the 
envelope or modify the waveform. Also, since it has to 
run in FAST mode, you can't see your display screen 
while the music is playing (unless you have the Oliger 
video upgrade). Still, this relocatable machine code 
routine might be just what the conductor ordered to tune 
in your BASIC software. 

You won't need much in the way of hardware. If you 
wish, you could connect a mic-level amplifier/speaker to 
the MIC output. Alternately, simply use your cassette 
deck. Connect the MIC from the computer to the MIC jack 
on the recorder, and connect an earphone or a small 
speaker to the EAR jack of the recorder. Then take an 
Old useless cassette, and cut or remove the tape, making 
a "dummy" cassette. This will allow you to place the 
recorder in RECORD mode without actually recording апу- 
thing. Or you could, of course, simply save to tape, and 
listen to your computer sonata after it has been re- 
corded. Finally, a cheap AM radio located near the 
computer might pick up the sound, but with reduced 
quality. 

The machine-code routine takes up exactly 256 
bytes. It is fully relocatable, so you can place it 
anywhere you want. А good place is in a 1 REM statement; 
this article will assume that this is where you'll want 
to put it, but remember that you can move it  eisewhere 
if you wish. Simply change the LET BEEP= statement to 
match the start of your code. 

Also required is 144 bytes after the code, for the 
frequency/duration lookup table. So start by entering a 
1 REM followed by 400 X's or other character. Use a 
POKER program such as LISTING 2 of the "Kaleidoscope" 
article in ТОМ Vol.3 Мо.1 You only have to change line 3 
to read: FOR A-16514 TO 16769. RUN your loader program, 
and enter the decimal values given in TABLE 1. When 
you're done, delete the loader lines and enter line 2 
and lines 9000-9991 of LISTING 1. (Incidentally, if your 
listing gets stuck at line 1, be sure you have a line 2, 
then LIST 2 followed by  POKE 16419,2.) RUN 9000 to 
generate the data table. When it stops, enter CONT to 
fill the rest. Line 9170 may be removed to speed up the 
process; it is included to show the significance of the 
various data elements. 

‘Each entry in the table corresponds to one of the 
36 possible notes, and consists of four bytes. The first 
two give the "delay constant" that determines the 
frequency of the note. (We call this "BC" in the program 
since this is the register pair used for this purpose.) 
The second two bytes give the number of cycles required 
for each note, at the minimum possible duration. 


The signal generated by the routine is perfectly 
symmetrical (50$ duty cycle). The minimum ON апа OFF 
time (BC-1) is 199 "T" states, and each increment of - BC 
increases. this time by 26 T states. Though the actual 
Clock frequency із 3.5 mHz., the "effective" clock 
frequency of the machine is 3.192 mHz. (T-states per 
second) because of the keyboard-sensing routine in the 
non-maskable interrupt. So, the frequency outputted will 
be: . 

FREQ-3. 192E6/ (2*(199*26* (BC-1))) 
By transposing this equation, the value of BC for a 


^ given frequency is: 


BC-1 + ((1.596E6/FREQ)-199)/26 

Each note (half-step) will be a fixed ratio higher 
in frequency than the previous one. Since there are 12 
half-steps per octave, and each octave represents a 
doubling in frequency, this ratio is 2^(1/12). The pro- 
gram.calculates each frequency using this ratio, and 
prints is as the first entry in the screen table. From 
this is calculates BC, and then "back-calculates" the 
ACTUAL frequency which will result. (Since only integer 
values can be POKEd, there will always be some im- 
precision in the actual frequency.) Finally, it cal- 
culates how many cycles of each note are required for 
the minimum time interval (sixteenth note at the fastest 
tempo). | 

The "A" below Middle С is defined at 440 Hz. You 
can move your scales up or down by changing line 9040. 
For example, to move it down an octave LET FREQ=220, to 
move it up an octaye, LET FREQ=880, etc. You can even 
transpose music to different scales by using other 
values. For instance, if you wrote a piece in the key of 
С and wish to transpose it to Е (4 half-steps higher), 
simply define your lowest "A" to Cf (LET А=554.4). 

When experimenting with different ranges, уом 
should be aware that the lower notes, the more accurate 
the PITCH becomes. On the other hand, the higher notes, 
the more accurate the DURATION becomes. 

After generating your table, enter the rest of 
LISTING 1. Then RUN for a demo. Enter the desired tempo 
(more about that later). A good tempo for the first 
music demo (line 100) is 180. Press any key when done 
for the second part (line 200) which gives a "laser" 
effect. Again press any key for a "зїгеп" demo (line 
300). Finally, press a key to play the second music demo 
(line 400), which show how you can simulate two voices! 
A suggested tempo for this is 240. Pretty neat, `eh? 

Here's how "MoTSart" is used. Your BEEP command 
must always be of the form: IF USR BEEP THEN... where 
BEEP has been initialized to the start of the program 
(16514 in this cage). What follows the REM are your 
musical commands and data. COMMANDS include semicolons 
";" and commas ",". 

A-SEMICOLON is used to set the duration of the 
following notes. After the semicolon command must be a 
number or letter (1-G), defining duration as follows: 
- Sixteenth note 
- Eighth note 
Dotted eight note 
Quarter note 
- Dotted quarter note 
- Half note 
- Dotted half note 
- Whole note 


AAAA WNE 


a Р 
ғи. ганан A ыг: 
лавсан, em л. 


Values inbetween will give other (unorthodox) 
durations. Once the duration has been set, it will re- 
main in force until changed by another . semicolon com- 


mand. 


COMMAS are used.to tell MoTSart that a note or rest 
is to be played. If the comma is.followed by. a. single 


TOLER» VO ENS memes 2 3 4 a 
Be иил» = ae ee ee ee = 
ES Cee 


note 


space, a rest is played. Otherwise, you must follow the 


comma with a number (1-3) 


followed by a letter (A-G) Specifying the note 
The note letter may be followed by 
resented as "+" for sharps and "-" 


you can't flat the lowest A (1А), 
(3G). 

The only other command 
TEMPO. This is done using the 


demo; simply RAND 1200/(desired tempo). 
divide into 1200 represents the number o 
120 represents two quarter-notes per 
ог one 4/4 bar every two seconds. 
MoTSart generates its own error codes. 
means that you are trying to use а non-valid 


notes) per minute; 
second, 


"accidentals", 
for flats. Note that 
or sharp the highest G 


specifiying the octave, 


(pitch). 
rep- 


is to set the overall 
RAND command. 
The number you: 
f beats (quarter 


See the 


Error R 
way of 


calling the routine, or don't have a REM after. the 
IF USR BEEP THEN. Error (inverse semicolon) means that a 


SEMICOLON command (duration) is out of range. 


Finally, 


all other errors are trapped with error (inverse comma), 
which means that a COMMAN command is incorrectly for- 
matted or out of range. If you get a semicolon or comma 


error report, 


the offending: character 
flagged by turning to inverse video. 
right at the end of the line! If this 


in the line is 
BEWARE of errors 
happens, the end- 


of-line marker gets POKEd out, causing the next line to 


be "strung" together with your BEEP line. 
careful and manage to fall into this trap, 
edit the line! The best thing to do in this case 


If you're not 


delete the line and re-enter it from scratch. - 
Ком you and your 2Х/Т5 сап make beautiful -music 


together! 


LISTING 1: BASIC 


2 REM MOtsART 
3 GOTO 100 

10 REM SET TEMPO SUBROUT INE 

20 PRINT "TEMPO?" 

30 INPUT TEMPO 

40 RAND 1200/ТЕМРО 

SO LET BEEP=16514 

60 RETURN 

80 REM WAIT SUBROUT INE 

90 IF INKEY$-** THEN GOTO 90 

75 RETURN 

100 REM MUSIC DEMO 

105 GOSUB 10 

110 IF USR ВЕЕР THEN REM 38,2E; 
5,26;1, :2,28,С,2С,4,20,2Е,2Р,20 
›ЗА;6,20;8,2Е;5,2Е+}1, :2,2Е-,С, 
29:3,34; 3,38; 1,28; 4,38, 3, ЗА; 1 ,2А 
:4,34:С,26,2,20,2Е; 6,22; 2,22; 4,2 
D;2,2E,2F16,28;2,2F;4,2E;2,2F ,2G 
14,3^,26,2F ,25;B,2D;1,10;2, 2D, 2E 
16:2F 12,25 13,2D; 2,25 ,2F 16,28;2,2 
9125/6 20120 2652, 26, 2F+ ,2E,2F* | 

3 

120 ЇЕ USR ВЕЕР THEN REM 38,25; 
5,26:1,16:2,26;6,20; 6,22; 2,22; 4, 
3А:2,34:6,20;8,26;4,26+;2,26+;4, 
ЗА, 2Ғ,2Е,20;8,2С,20;6,2Е;8,26;4, 
3С;2,3Є;4;3А,2Ғ, ,2E, 208,26, 28,6, 
2C12,2C,2E,26,3C,3A,2F , 2D, 2E-,2E 
»26,ЗА,38,3С,3,2С,1С 

130 60508 80 

140 CLS 

150 PRINT *RUN- AGAIN?" 

160 PAUSE 4Е4 

170 IF INKEYS-*Y* THEN GOTO 100 

200 КЕМ LASER 

210 LET TEMPO-1200 

220 GOSUB 40 

230 FOR №; TO іо 


240 IF USR BEEP THEN REM ;1,3G+ 
,36,3Ғ+ ,3F , 3E, 3E- ,3D,3C* ,3C,38,3 
B- ,3^,26* ,26,26- ,2F , 2E, 2E- ,2D,2C 
* ,2C, 2B, 2B-, 2A, 1G+,1G,1G-,1F,1E, 


TABLE 1: MOTSART DECIMAL DATA 


33 
35 
234 
25 
14 
124 
118 
255 
24 
87 
251 
188 


1 7 34 118 44 205 
42 22 64 35 126 254 
2 207 26 35 126 254 
20 35 126 214 29 254 
4 126 203 255 119 207 
50 ? 44 24 230 254 
254 26 40 6 126 203 
207 125 35 126 167 32 
7 64 95 58 50 64 
45 6 11 120 177 32 
32 245 29 32 238 24 
27 254 3 48 215 245 
214 38 254 7 48 206 
23 254 3 4873 #60 
32 4 178 2 24 10 
40 4 178 3 24 2 
77 35 126 254 21 32 
24 8 254 22 32 3 
1 43 241 71 128 128 
129 254 255 40 151 
147 79 5 0227 42 
? ? ? 7 78 35 
94 35 86 225 24 2 
175 245 175 245 
120 177 32 251 
42 7 41 32 253 241 
217 254 11 120 177 32 
241 60 253 190 9 40 
43 245 42 3 51 32 
24 209 241 40 253 190 
4 221 У 0 0 24 
32 188 24 184 


Note: line 350 is 
the same as line 240. 


1E-,10,1C+,1C,1B 18-,1А Line 245 ends with a Space. 
245 IF USR BEEP THEN REM 16, 4&——— — — 7 m 


250 NEXT N 
260 GOSUB 80 

300 REM SIREN 

310 LET ТЕМРО=400 

320 GOSUB 40 

330 FOR Мат ТО 5 

340 IF USR BEEP THEN REM 11,1А, 
1A+,1B,1C,1C+,1D,1D+,1E,1F,1F+, 1 
G, 16+, 2A, 2A+,28,2C,2C+, 2D, 20+, 2E 
»2F ,2F* ,26,268* , 3A, За+ , 3B, 3C, 36+ , 
30, 30+ ,3E,3F,3F+,36,36+ 

350 IF USR BEEP THEN REM ,3G+,3 
G,3F* ,3F ,3E,3E- ,3D,3C* , 3C, 38, 38– 
»3^,28* ,26,2G- ,2F ,2E ,2E- , 2D, 2C*, 
2C,28,28-,24,16*,16,1G-, 1F, 1E, 1E 
7,1D,1C*,1C,1B,1B-,1A 

360 NEXT N | 

370 GOSUB 80 

400 REM SIMULATING 2 VOICES 

410 GOSUB 10 

420 GOSUB 470 

430- GOSUB 480 

440 GOSUB 480 

450 GOSUB 470 

460 IF USR BEEP THEN REM ,2С,1Е 
›2С,1Е,2С,1Е,2С,1Е;4,2С 

465 GOSUB 80 

444 STOP 

470 IF USR BEEP THEN REM ;1,2C, 
1E,2C, ,2C,1E,2C, ,28,2Е,26, ‚2б 
»2Е,28, ,3A,2F,3A, ,3A,2F,3A, ‚2 
6,2Е,26,2Е,26,2Е,26, ,2F,2D,2F, 
»2Р,28,2Е, ,2E,2C,2E, ,2Е,16,2Е, 
,20,2А,20, ,20,1Е,20, ,2C,1E,2C 
,1Е,2С,16,2С,16 


475 RETURN 
480 IF USR BEEP THEN REM ,26,2C 
,26, ,28,2b,28, ,2F,2D,2F, ,2F,2 
B,2F, ,2E,2C,2E, ,2E,1G,2E, ,2D, 
2A,2D,2A,2D,2B,2D, ;1 

485 RETURN 
9000 REM SET UP DATA TABLE 

9010 CLS 
9020 PRINT "FREQ BC ACTUAL МО 
.CYCLES 


9030 LET BYTE-14770 

9040 LET FREQ-440 

9050 LET RATIO-2**(1/12) 

9060 FOR Мі TO 36 

9070 LET BC=INT (€C1.59 5E6/FREQ) 
-199)/24+1 .5) 

9080 IF ВС-0 THEN LET BC-1 

9090 LET ACT-1.595Eó/(199*25x*(BC 
7-12) 

7100 LET DE=INT (ACT#.013+.5) 
9110 RAND BC 

9120 POKE BYTE*0,PEEK 16434 

7130 POKE BYTE*1,PEEK 14435 

9140 RAND DE 

7150 POKE BYTE+2,PEEK 14434 

9160 POKE BYTE*3,PEEK 14435 

9170 PRINT «INT (FREQ#10+.5>>/10 
“ТАВ 7;BC;TAB 11;«INT (ACT#10+.5 
››/10;ТАВ 18;DE 

7180 LET BYTE=BYTE+4 

7170 LET FREGSFREQX*RATIO 

9200 NEXT N 

9210 STOP 

9990 SAVE “МОТбАВС" 

9991 GOTO 100 


